package com.tanhua.dubbo.server.api;

import cn.hutool.core.collection.CollUtil;
import cn.hutool.core.convert.Convert;
import cn.hutool.core.util.ObjectUtil;
import cn.hutool.core.util.StrUtil;
import com.alibaba.dubbo.config.annotation.Service;
import com.tanhua.dubbo.server.enums.CommentType;
import com.tanhua.dubbo.server.enums.IdType;
import com.tanhua.dubbo.server.pojo.*;
import com.tanhua.dubbo.server.service.IdService;
import com.tanhua.dubbo.server.service.TimeLineService;
import com.tanhua.dubbo.server.vo.PageInfo;
import lombok.extern.slf4j.Slf4j;
import org.apache.commons.lang3.ObjectUtils;
import org.apache.commons.lang3.StringUtils;
import org.bson.types.ObjectId;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.data.domain.PageRequest;
import org.springframework.data.domain.Pageable;
import org.springframework.data.domain.Sort;
import org.springframework.data.mongodb.core.MongoTemplate;
import org.springframework.data.mongodb.core.query.Criteria;
import org.springframework.data.mongodb.core.query.Query;
import org.springframework.data.redis.core.RedisTemplate;

import java.util.ArrayList;
import java.util.List;

@Slf4j
@Service(version = "1.0.0") // 声明这是一个dubbo服务
public class QuanZiApiImpl implements QuanZiApi{

    //评论数据存储在Redis中key的前缀
    private static final String COMMENT_REDIS_KEY_PREFIX = "QUANZI_COMMENT_";

    //用户是否点赞的前缀
    private static final String COMMENT_USER_LIKE_REDIS_KEY_PREFIX = "USER_LIKE_";

    //用户是否喜欢的前缀
    private static final String COMMENT_USER_LOVE_REDIS_KEY_PREFIX = "USER_LOVE_";

    @Autowired
    private MongoTemplate mongoTemplate;

    @Autowired
    private IdService idService;

    @Autowired
    private TimeLineService timeLineService;

    @Autowired
    private RedisTemplate<String,String> redisTemplate;

    @Autowired
    private VideoApi videoApi;

    /**
     * 查询好友动态的方法
     * @param page 当前页数
     * @param pageSize 每一页查询的数据条数
     * @param userId 用户id
     * @return
     */
    @Override
    public PageInfo<Publish> queryPublishList(Integer page, Integer pageSize, Long userId) {
        // 首先先将分页的数据装进PageInfo对象中
        PageInfo<Publish> pageInfo = new PageInfo<>();
        pageInfo.setPageNum(page);
        pageInfo.setPageSize(pageSize);

        // 1. 通过传递的userId查询用户专属的时间线表
            // 创建一个查询条件
        Pageable pageable = PageRequest.of(page - 1,pageSize,Sort.by(Sort.Order.desc("date")));
        Query query = new Query().with(pageable);
        List<TimeLine> timeLines = mongoTemplate.find(query, TimeLine.class,"quanzi_time_line_"+userId);

        if (timeLines.isEmpty()){
            // 如果没有查询到 时间线表中的数据 直接返回pageinfo
            return pageInfo;
        }

        // 2. 通过返回的用户时间线对象 获取到所有好友发布动态的id 再来查询发布表展示动态
            // 创建一个集合用作封装所有好友的动态id
        ArrayList<ObjectId> ids = new ArrayList<>();

        for (TimeLine timeLine : timeLines) {
            ObjectId publishId = timeLine.getPublishId();
            ids.add(publishId);
        }

            // 创建查询发布表查询条件，并进根据发布时间进行倒序排序
        Query queryPublish = new Query(Criteria.where("id").in(ids)).with(Sort.by(Sort.Order.desc("created")));
        List<Publish> publishes = mongoTemplate.find(queryPublish, Publish.class);

        // 3. 将查询到的每条动态的信息，暂时封装到 pageInfo 的records属性中进行返回
        pageInfo.setRecords(publishes);

        return pageInfo;
    }

    /**
     * 发布动态
     *
     * @param publish
     * @return 发布成功返回动态id
     */
    @Override
    public String savePublish(Publish publish) {
        // 1. 对传递过来的 publish进行校验
        if(!ObjectUtils.allNotNull(publish.getText(), publish.getUserId())){
            // 发布失败
            return null;
        }

        // 2. 设置发布状态的主键id
        publish.setId(ObjectId.get());

        // 3. 远程调用dubbo 生成自增长的Pid
        publish.setPid(idService.createId(IdType.PUBLISH));
        //    设置发布时的时间戳
        publish.setCreated(System.currentTimeMillis());

        // 4. 写入mongoDb的publish表中
        mongoTemplate.save(publish);

        // 5. 再将对应的信息写入用户自己的相册表中
        Album album = new Album();
        album.setId(ObjectId.get());
        album.setPublishId(publish.getId());
        album.setCreated(System.currentTimeMillis());

        mongoTemplate.save(album,"quanzi_album_" + publish.getUserId());

        // 6. 异步写入好友时间线表,不需要返回值 直接异步调用
        timeLineService.saveTimeLine(publish.getUserId(), publish.getId());

        return publish.getId().toString();
    }

    /**
     * 查询推荐动态的方法
     * @param userId 用户id
     * @param page 当前页数
     * @param pageSize 每一页查询的数据条数
     * @return
     */
    @Override
    public PageInfo<Publish> queryRecommendPublishList(Long userId, Integer page, Integer pageSize) {
        PageInfo<Publish> pageInfo = new PageInfo<>();
        pageInfo.setPageNum(page);
        pageInfo.setPageSize(pageSize);

        // 根据用户id从redis中查询出给该用户的推荐动态所对应的pid
        String key = "QUANZI_PUBLISH_RECOMMEND_" + userId;
        String data = redisTemplate.opsForValue().get(key);
        if (StringUtils.isEmpty(data)){
            return pageInfo;
        }

        // 如果不为空则把pid进行分页，这里使用物理分页
        String[] pids = StringUtils.split(data, ',');
        //计算分页
        //[0, 10]
        int startIndex = (page - 1) * pageSize;
        int endIndex = Math.min((page * pageSize),pids.length);

        List<Long> pidLongList = new ArrayList<>();
        // 将查询出来的pid以分页的方式放入pidLongList集合中
        for (int i = startIndex; i < endIndex; i++) {
            pidLongList.add(Long.valueOf(pids[i]));
        }

        if (pidLongList.isEmpty()){
            return pageInfo;
        }

        //根据pid查询publish，根据发布时间进行倒叙
        Query query = new Query(Criteria.where("pid").in(pidLongList))
                .with(Sort.by(Sort.Order.desc("created")));
        List<Publish> publishes = mongoTemplate.find(query, Publish.class);
        if (publishes.isEmpty()) {
            //没有查询到数据
            return pageInfo;
        }

        //如果查询到了数据 那么就将查询出来的动态的集合 封装到pageinfo中返回
        pageInfo.setRecords(publishes);

        return pageInfo;
    }

    /**
     * 点赞
     * @param userId
     * @param publishId
     * @return
     */
    @Override
    public Boolean likeComment(Long userId, String publishId) {
        // 1. 判断用户是否点赞，返回true表示已点赞
        if (queryUserIsLike(userId,publishId)){
            return false;
        }

        // 2. 将点赞的信息 写入MongoDB中，true则为写入成功
        Boolean result = this.saveComment(userId, publishId, CommentType.LIKE, null);
        if (!result) {
            return false;
        }

        // 3. 写入mongodb成功后，修改redis中的点赞数
        String redisKey = getCommentRedisKeyPrefix(publishId);
        String hashKey = CommentType.LIKE.toString();
        redisTemplate.opsForHash().increment(redisKey,hashKey,1);

        // 4. 修改redis中记录的是否点赞
        String userHashKey = getCommentUserLikeRedisKeyPrefix(userId);
        redisTemplate.opsForHash().put(redisKey,userHashKey,"1");

        return true;
    }

    /**
     * 取消点赞
     * @param userId
     * @param publishId
     * @return
     */
    @Override
    public Boolean disLikeComment(Long userId, String publishId) {
        // 1. 判断用户是否点赞 返回false则用户没有点赞
        if (!queryUserIsLike(userId,publishId)){
            // 用户没有点赞 直接返回
            return false;
        }

        // 2. 删除评论数据
        Boolean result = this.removeComment(userId, publishId, CommentType.LIKE);
        if (!result) {
            return false;
        }

        // 3. 删除掉MongoDB中的comment中的评论数据后，修改redis中的数据
            //修改点赞数
        String redisKey = getCommentRedisKeyPrefix(publishId);
        String hashKey = CommentType.LIKE.toString();
        redisTemplate.opsForHash().increment(redisKey,hashKey,-1);

        // 4. 删除用户在redis中点赞的记录
        String userHashKey = getCommentUserLikeRedisKeyPrefix(userId);
        redisTemplate.opsForHash().delete(redisKey,userHashKey);

        return true;
    }

    /**
     * 查询是否点赞
     * @param userId
     * @param publishId
     * @return
     */
    @Override
    public Boolean queryUserIsLike(Long userId, String publishId) {
        // 1. 首先从 redis中查询是否点赞
        String redisKey = getCommentRedisKeyPrefix(publishId);
        String userHashkey = getCommentUserLikeRedisKeyPrefix(userId);
        Object data = redisTemplate.opsForHash().get(redisKey, userHashkey);
        if (ObjectUtil.isNotEmpty(data)){
            // 如果查到该用户在redis中代表点赞的字段不为空，则返回true
            return true;
        }

        // 2. 如果在redis中没有查询到 并不说明用户没有点赞，很有可能是因为 redis中的数据丢失了，再去MongoDB中确认
        Query query = Query.query(Criteria.where("userId").is(userId)
                .and("publishId").is(new ObjectId(publishId))
                .and("commentType").is(CommentType.LIKE));
        // 进入数据库进行查询 如果查询到则count为1
        long count = mongoTemplate.count(query, Comment.class);

        if (count == 0){
            // 说明用户没有点赞
            return false;
        }

        // 3. 说明用户已经点赞，将用户点赞信息从新写入redis中
        redisTemplate.opsForHash().put(redisKey,userHashkey,"1");

        // 返回true表示用户已经点赞
        return true;
    }

    /**
     * 查询点赞数
     * @param publishId
     * @return
     */
    @Override
    public Long queryLikeCount(String publishId) {
        // 获取点赞数在redis中对应的key和hashkey
        String redisKey = getCommentRedisKeyPrefix(publishId);
        String redisHashKey = CommentType.LIKE.toString();

        // 拿到在redis中存储的该动态的点赞数
        Object data = redisTemplate.opsForHash().get(redisKey, redisHashKey);

        if (ObjectUtil.isNotEmpty(data)){
            // hutool工具转化成long类型
            return Convert.toLong(data);
        }

        // 如果redis中没有查询到 点赞数那么去MongoDB中再次查询确认
        Long count = queryCommentCount(publishId,CommentType.LIKE);

        // 查询出来之后 在写入redis中
        redisTemplate.opsForHash().put(redisKey,redisHashKey,String.valueOf(count));
        return count;
    }

    /**
     * 评论喜欢的方法
     * @param userId
     * @param publishId
     * @return
     */
    @Override
    public Boolean loveComment(Long userId, String publishId) {
        //查询该用户是否已经喜欢
        if (this.queryUserIsLove(userId, publishId)) {
            return false;
        }

        //喜欢
        boolean result = this.saveComment(userId, publishId, CommentType.LOVE, null);
        if (!result) {
            return false;
        }

        //喜欢成功后，修改Redis中的总的喜欢数
        String redisKey = this.getCommentRedisKeyPrefix(publishId);
        String hashKey = CommentType.LOVE.toString();
        this.redisTemplate.opsForHash().increment(redisKey, hashKey, 1);

        //标记用户已经喜欢
        hashKey = this.getCommentUserLoveRedisKey(userId);
        this.redisTemplate.opsForHash().put(redisKey, hashKey, "1");

        return true;
    }

    /**
     * 取消喜欢的方法
     * @param userId
     * @param publishId
     * @return
     */
    @Override
    public Boolean disLoveComment(Long userId, String publishId) {
        if (!this.queryUserIsLove(userId, publishId)) {
            //如果用户没有喜欢，就直接返回
            return false;
        }

        boolean result = this.removeComment(userId, publishId, CommentType.LOVE);
        if (!result) {
            //删除失败
            return false;
        }

        //删除redis中的记录
        String redisKey = this.getCommentRedisKeyPrefix(publishId);
        String hashKey = this.getCommentUserLoveRedisKey(userId);
        this.redisTemplate.opsForHash().delete(redisKey, hashKey);
        this.redisTemplate.opsForHash().increment(redisKey, CommentType.LOVE.toString(), -1);

        return true;
    }

    /**
     * 查询喜欢次数
     * @param publishId
     * @return
     */
    @Override
    public Long queryLoveCount(String publishId) {
        //首先从redis中命中，如果命中的话就返回，没有命中就查询Mongodb
        String redisKey = this.getCommentRedisKeyPrefix(publishId);
        String hashKey = CommentType.LOVE.toString();
        Object value = this.redisTemplate.opsForHash().get(redisKey, hashKey);
        if (ObjectUtil.isNotEmpty(value)) {
            return Convert.toLong(value);
        }

        //查询count
        Long count = this.queryCommentCount(publishId, CommentType.LOVE);

        //存储到redis中
        this.redisTemplate.opsForHash().put(redisKey, hashKey, String.valueOf(count));

        return count;
    }

    /**
     * 查询是否喜欢的方法
     * @param userId
     * @param publishId
     * @return
     */
    @Override
    public Boolean queryUserIsLove(Long userId, String publishId) {
        String redisKey = this.getCommentRedisKeyPrefix(publishId);
        String hashKey = this.getCommentUserLoveRedisKey(userId);
        Object value = this.redisTemplate.opsForHash().get(redisKey, hashKey);
        if (ObjectUtil.isNotEmpty(value)) {
            return StrUtil.equals(Convert.toStr(value), "1");
        }

        //查询mongodb
        Query query = Query.query(Criteria.where("publishId")
                .is(new ObjectId(publishId))
                .and("userId").is(userId)
                .and("commentType").is(CommentType.LOVE.getType()));
        long count = this.mongoTemplate.count(query, Comment.class);
        if (count == 0) {
            return false;
        }

        //标记用户已经喜欢
        this.redisTemplate.opsForHash().put(redisKey, hashKey, "1");

        return true;
    }


    /**
     * 根据id查询动态
     * @param id 动态id
     * @return
     */
    @Override
    public Publish queryPublishById(String id) {
//        System.out.println(id);
        Publish publish = mongoTemplate.findById(new ObjectId(id), Publish.class);
        return publish;
    }

    /**
     * 查询评论列表
     *
     * @param publishId
     * @param page
     * @param pageSize
     * @return
     */
    @Override
    public PageInfo<Comment> queryCommentList(String publishId, Integer page, Integer pageSize) {
        PageInfo<Comment> pageInfo = new PageInfo<>();
        pageInfo.setPageNum(page);
        pageInfo.setPageSize(pageSize);

        // 创建一个分页条件, 按照创建时间进行顺序排序
        PageRequest pageRequest = PageRequest.of(page - 1, pageSize,
                Sort.by(Sort.Order.asc("created")));

        // 创建一个查询条件，当这条动态被评论时，在comment表中会生成一条评论的数据，
        // 所以我们可以根据这条动态的id，以及评论数据的类型CommentType来进行查询
        Query query = new Query(Criteria.where("publishId").is(new ObjectId(publishId))
                .and("commentType").is(CommentType.COMMENT.getType()))
                .with(pageRequest);
        List<Comment> comments = mongoTemplate.find(query, Comment.class);

        pageInfo.setRecords(comments);

        return pageInfo;
    }

    /**
     * 发表评论 此方法是重载保存comment对象的方法
     *
     * @param userId
     * @param publishId
     * @param content
     * @return
     */
    @Override
    public Boolean saveComment(Long userId, String publishId, String content) {
        // 需要指定 添加comment对象 也就是评论对象的时候的 枚举类型
        return saveComment(userId,publishId,CommentType.COMMENT,content);
    }

    /**
     * 查询评论数
     *
     * @param publishId
     * @return
     */
    @Override
    public Long queryCommentCount(String publishId) {
        return this.queryCommentCount(publishId, CommentType.COMMENT);
    }


    /**
     * 查询对我的点赞消息列表
     * @param userId
     * @param page
     * @param pageSize
     * @return
     */
    @Override
    public PageInfo<Comment> queryLikeCommentListByUser(Long userId, Integer page, Integer pageSize) {
       return queryCommentListByUser(userId, CommentType.LIKE, page, pageSize);
    }


    /**
     * 查询对我的喜欢消息列表
     *
     * @return
     */
    @Override
    public PageInfo<Comment> queryLoveCommentListByUser(Long userId, Integer page, Integer pageSize) {
        return queryCommentListByUser(userId, CommentType.LOVE, page, pageSize);
    }

    /**
     * 查询对我的评论消息列表
     *
     * @return
     */
    @Override
    public PageInfo<Comment> queryCommentListByUser(Long userId, Integer page, Integer pageSize) {
        return queryCommentListByUser(userId, CommentType.COMMENT, page, pageSize);
    }

    /**
     * 根据用户的id查询用户的相册表的方法
     * @param userId     佳人的id
     * @param page
     * @param pageSize
     * @return
     */
    @Override
    public PageInfo<Publish> queryAlbumList(Long userId, Integer page, Integer pageSize) {
        PageInfo<Publish> pageInfo = new PageInfo<>();
        pageInfo.setPageNum(page);
        pageInfo.setPageSize(pageSize);

        // 构建分页和排序对象
        PageRequest pageRequest = PageRequest.of(page -1 ,pageSize,
                Sort.by(Sort.Order.desc("created")));
        // 构建查询对象
        Query query = new Query().with(pageRequest);
        // 查询自己到的相册表
        List<Album> albumList = mongoTemplate.find(query, Album.class, "quanzi_album_" + userId);

        if (CollUtil.isEmpty(albumList)){
            return pageInfo;
        }
        // 将相册对象集合中的publishid字段 封装到一个新的集合中
        List<Object> publishIdList = CollUtil.getFieldValues(albumList, "publishId");

        // 根据publishid查出这个用户的所有的动态信息
        Query queryPublish = Query.query(Criteria.where("id").in(publishIdList))
                .with(Sort.by(Sort.Order.desc("created")));
        List<Publish> publishList = mongoTemplate.find(queryPublish, Publish.class);

        pageInfo.setRecords(publishList);

        return pageInfo;
    }


    /**
     * 查询点赞或者评论或者喜欢的数量
     *
     * @param publishId
     * @param commentType
     * @return
     */
    private Long queryCommentCount(String publishId, CommentType commentType) {
        Query query = Query.query(Criteria.where("publishId").is(new ObjectId(publishId))
                .and("commentType").is(commentType.getType()));
        Long count = mongoTemplate.count(query,Comment.class);

        return count;
    }

    /**
     * 删除评论数据的方法
     * @param userId
     * @param publishId
     * @param commentType
     * @return
     */
    private Boolean removeComment(Long userId, String publishId, CommentType commentType) {
        Query query = new Query(Criteria.where("userId").is(userId)
                .and("publishId").is(new ObjectId(publishId))
                .and("commentType").is(commentType.getType()));
        // 删除MongoDB中的数据
        long deletedCount = mongoTemplate.remove(query,Comment.class).getDeletedCount();


        // 大于0 为true 删除成功
        return deletedCount > 0;
    }

    /**
     * 保存comment对象的方法
     * @param userId     登录用户的对象
     * @param publishId  动态的id
     * @param commentType       评论的类型
     * @param content    评论的文本内容
     * @return
     */
    private Boolean saveComment(Long userId, String publishId, CommentType commentType, String content) {
        try {
            Comment comment = new Comment();
            comment.setId(new ObjectId());
            comment.setUserId(userId);
            comment.setPublishId(new ObjectId(publishId));
            // 评论类型
            comment.setCommentType(commentType.getType());
            // 内容
            comment.setContent(content);
            comment.setCreated(System.currentTimeMillis());

            // 通过publishId查出 动态对象
            Publish publish = queryPublishById(publishId);

            // 因为原有的点赞实现中，需要查询Publish对象，但是现在实现的是针对评论的点赞，
            // 是查询不到Publish对象的，所以抛出了空指针异常。
            if (ObjectUtil.isNotEmpty(publish)) {
                // 说明进行的是 动态的点赞功能
                comment.setPublishUserId(publish.getUserId());
            } else {
                //不是动态的点赞功能 就查询评论列表
                Comment myComment = this.queryCommentById(publishId);
                if(ObjectUtil.isNotEmpty(myComment)){
                    // 如果查询到的评论数据不为空，那就通过查询到的评论对象获取到发布这条评论的用户
                    comment.setPublishUserId(myComment.getUserId());
                }else{
                    //查询小视频
                    Video video = this.videoApi.queryVideoById(publishId);
                    if(ObjectUtil.isNotEmpty(video)){
                        comment.setPublishUserId(video.getUserId());
                    }else{
                        // 其他情况，直接返回
                        return false;
                    }
                }
            }

            // 将点赞的数据信息 保存到comment中
            this.mongoTemplate.save(comment);

            return true;
        } catch (Exception e) {
            log.error("保存Comment出错~ userId = " + userId + ", publishId = " + publishId + ", commentType = " + commentType, e);
        }

        return false;
    }

    /**
     * 根据id查询Comment对象
     *
     * @param id
     * @return
     */
    private Comment queryCommentById(String id) {
        return this.mongoTemplate.findById(new ObjectId(id), Comment.class);
    }

    /**
     * 获取redis中用来记录动态的点赞次数的key
     * @param publishId
     * @return
     */
    private String getCommentRedisKeyPrefix(String publishId) {
        return COMMENT_REDIS_KEY_PREFIX + publishId;
    }

    /**
     * 获取redis中用来记录用户是否点赞的Hashkey
     * @param userId
     * @return
     */
    private String getCommentUserLikeRedisKeyPrefix(Long userId) {
        return COMMENT_USER_LIKE_REDIS_KEY_PREFIX + userId;
    }

    /**
     * 获取redis中用来记录用户喜欢是否喜欢的HashKey的方法
     * @param userId
     * @return
     */
    private String getCommentUserLoveRedisKey(Long userId) {
        return COMMENT_USER_LOVE_REDIS_KEY_PREFIX + userId;
    }

    /**
     * 通用的查询comment对象的方法
     * @param userId        用户自己的id
     * @param commentType
     * @param page
     * @param pageSize
     * @return
     */
    private PageInfo<Comment> queryCommentListByUser(Long userId, CommentType commentType, Integer page, Integer pageSize) {
        PageInfo<Comment> pageInfo = new PageInfo<>();
        pageInfo.setPageNum(page);
        pageInfo.setPageSize(pageSize);

        // 1. 通过用户自己的id和评论的数据类型查询comment表中查出此项评论的佳人id
            // 构建分页查询
        PageRequest pageRequest = PageRequest.of(page - 1,pageSize,
                Sort.by(Sort.Order.desc("created")));
            // 构建查询条件
        Query query = Query.query(Criteria.where("publishUserId").is(userId)
                .and("commentType").is(commentType))
                .with(pageRequest);
        List<Comment> comments = mongoTemplate.find(query, Comment.class);

        pageInfo.setRecords(comments);
        return pageInfo;

    }



}
